home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwlt07.dir / 00021_Script_21 < prev    next >
Text File  |  1994-11-15  |  5KB  |  200 lines

  1. on startMovie
  2.   global inFrame, nowFrame, currMM
  3.   global dialogOn, nextLT, prevLT
  4.   cursor 4
  5.   set prevLT = "FLWLT06"
  6.   set nextLT = "FLWLT08"
  7.   set dialogOn = FALSE
  8.   set currMM = "FLWMM"
  9.   set nowFrame = "ltpra897000°°°"
  10.   set inFrame = ""
  11.   puppetsprite 9, TRUE
  12.   puppetSprite 11, TRUE
  13.   puppetSprite 12, TRUE
  14.   set the immediate of sprite 11 to TRUE
  15.   set the immediate of sprite 12 to TRUE
  16.   puppetSprite 20, TRUE
  17.   puppetSprite 21, TRUE
  18.   puppetSprite 22, TRUE
  19.   puppetSprite 23, TRUE
  20.   set the immediate of sprite 20 to TRUE
  21.   set the immediate of sprite 23 to TRUE
  22. end startMovie
  23.  
  24. on stepMovie
  25.   global nowFrame,currFrame
  26.   if nowFrame <> currFrame then
  27.     seeAlsoList
  28.     set currFrame = nowFrame
  29.   end if
  30. end stepMovie
  31.  
  32. on stopMovie
  33.   put " " into field "seeAlsoText"
  34.   set the castNum of sprite 21 to 1050
  35.   puppetSprite 21, FALSE
  36.   updateStage
  37. end stopMovie
  38.  
  39. on saveLocals
  40.   global lastFrame, nowFrame, lastMovie, origLocH
  41.   set lastMovie = the movie
  42.   set lastFrame = nowFrame
  43. end saveLocals
  44.  
  45. on ltForStep
  46.   global inFrame, nextLT, ltQT
  47.   puppetSprite 4, FALSE
  48.   set ltQt = FALSE
  49.   set inFrame = ""
  50.   if the frame = label (line (the number of lines in the labellist - 1) of the labellist) then
  51.     
  52.     go to frame "ltpra901001°°°" of movie nextLT
  53.   else
  54.     go to marker (+1)
  55.     updateStage
  56.   end if
  57. end ltForStep
  58.  
  59. on ltBackStep
  60.   global inFrame, prevLT, ltQT
  61.   puppetSprite 4, FALSE
  62.   set ltQT = FALSE
  63.   set inFrame = ""
  64.   if the frame < 5 then
  65.     
  66.     go to frame "ltpra894004°°°" of movie prevLT
  67.   else
  68.     go to marker (-1)
  69.     updateStage
  70.   end if
  71. end ltBackStep
  72.  
  73. on checkNav
  74.   if rollover(12) then
  75.     set the castNum of sprite 12 to the number of cast "leftUp"
  76.   else
  77.     set the castNum of sprite 12 to the number of cast "leftRt"
  78.   end if
  79.   
  80.   if rollover(11) then
  81.     set the castNum of sprite 11 to the number of cast "rightUp"
  82.   else
  83.     set the castNum of sprite 11 to the number of cast "rightRt"
  84.   end if
  85.   cursor -1
  86.   updateStage
  87. end checkNav
  88.  
  89. on buttonState
  90.   global FrankNav, bflag, nowFrame, noTx, dialogOn
  91.   
  92.   if dialogOn = FALSE then
  93.     
  94.     --sticking local call here for convenience
  95.     worldLite
  96.     if the mouseV > 200 or bFlag = TRUE then
  97.       set bFlag = FALSE
  98.       doState
  99.     end if
  100.   end if
  101. end buttonState
  102.  
  103. on scrollRight
  104.   if the clickon = 11 then
  105.     sound stop 1
  106.     startTimer
  107.     repeat while the timer < 2
  108.       set the castNum of sprite 11 to the number of cast "rightDn"
  109.       updateStage
  110.     end repeat
  111.     timeRight
  112.     flush
  113.   end if   
  114. end scrollRight
  115.  
  116. on scrollLeft
  117.   if the clickon = 12 then
  118.     sound stop 1
  119.     startTimer
  120.     repeat while the timer < 2
  121.       set the castNum of sprite 12 to the number of cast "leftDn"
  122.       updateStage
  123.     end repeat
  124.     timeLeft
  125.     flush
  126.   end if  
  127. end scrollLeft
  128.  
  129. on timeLeft
  130.   global prevLt
  131.   puppetSprite 4, FALSE
  132.   
  133.   go to movie prevLT
  134. end timeLeft
  135.  
  136. on timeRight
  137.   global nextLt
  138.   puppetSprite 4, FALSE
  139.   
  140.   go to movie nextLT
  141. end timeRight
  142.  
  143. on worldLite
  144.   set the castNum of sprite 9 to 2
  145.   if rollover(9) then
  146.     set the castNum of sprite 9 to 20
  147.   end if
  148. end worldLite
  149.  
  150. on jumpVLB7
  151.   global dialogOn
  152.   if dialogOn = FALSE then
  153.     sound stop 1
  154.     if the clickOn < 7 or the clickOn > 23 then
  155.       if the mouseH > 168 and the mouseH < 305 and the mouseV > 147 and the mouseV < 225 then
  156.         puppetSprite 4, FALSE
  157.         go to frame "ltpra897001°°°"
  158.       else if the mouseH > 212 and the mouseH < 390 and the mouseV > 75 and the mouseV < 134 then
  159.         puppetSprite 4, FALSE
  160.         go to frame "ltpra897002°°°"
  161.       else if the mouseH > 351 and the mouseH < 475 and the mouseV > 155 and the mouseV < 208 then
  162.         puppetSprite 4, FALSE
  163.         go to frame "ltpra897003°°°"
  164.       else if the mouseH > 453 and the mouseH < 618 and the mouseV > 75 and the mouseV < 170 then
  165.         puppetSprite 4, FALSE
  166.         go to frame "ltpra897004°°°"
  167.       else 
  168.         nothing
  169.       end if
  170.     end if
  171.   end if
  172.   flush
  173. end jumpVLB7
  174.  
  175. on rollVLB7
  176.   if the mouseH > 168 and the mouseH < 305 and the mouseV > 147 and the mouseV < 225 then
  177.     set the castNum of sprite 4 to 8
  178.     if the mouseDown then 
  179.       set the castNum of sprite 4 to 4
  180.     end if
  181.   else if the mouseH > 212 and the mouseH < 390 and the mouseV > 75 and the mouseV < 134 then
  182.     set the castNum of sprite 4 to 9
  183.     if the mouseDown then 
  184.       set the castNum of sprite 4 to 4
  185.     end if
  186.   else if the mouseH > 351 and the mouseH < 475 and the mouseV > 155 and the mouseV < 208 then
  187.     set the castNum of sprite 4 to 10
  188.     if the mouseDown then 
  189.       set the castNum of sprite 4 to 4
  190.     end if
  191.   else if the mouseH > 453 and the mouseH < 618 and the mouseV > 75 and the mouseV < 170 then
  192.     set the castNum of sprite 4 to 11
  193.     if the mouseDown then 
  194.       set the castNum of sprite 4 to 4
  195.     end if
  196.   else 
  197.     set the castNum of sprite 4 to 4
  198.   end if
  199.   updateStage
  200. end rollVLB7